用ASP实现对MP3曲目信息的操作
objFile Set objFSO = Server.CreateObject(Scripting.FileSYstemObject) Set objFolder = objFSO.GetFolder(folder) Create the Stream object set objStream = Server.CreateObject(ADODB.Stream) objStream.Type = adTypeBinary Loop through the files in the folder For Each objFile in objFolder.Files Open the stream objStream.Open objStream.LoadFromFile objFile.Path Read the last 128 bytes objStream.Position = objStream.size - 128 Read the ID3 v1 tag info strTag = ConvertBin(objStream.Read(3)) if ucase(strTag) = TAG then strSongName = ConvertBin(objStream.Read(30)) strArtist = ConvertBin(objStream.Read(30)) strAlbum = ConvertBin(objStream.Read(30)) strYear = ConvertBin(objStream.Read(4)) strComment = ConvertBin(objStream.Read(30)) end if Display the results response.write tabletrtd colspan=2h3 _ ID3 Tag info for:/td/trtr _ td colspan=2 objFile.Name /td/tr response.write trtdbArtist: /b/td _ td strArtist /td/tr response.write trtdbTrack: /b/td _ td strSongName /td/tr response.write trtdbAlbum: /b/td _ td strAlbum /td/tr response.write trtdbYear: /b/td _ td strYear /td/tr response.write trtdbComment: /b _ /tdtd strComment /td/tr response.write /table objStream.Close Response.Write phrp Next Set objStream = Nothing Clean up... % 自己试试吧 希望能对你有所帮助 ,用metadata来引入DLL,有歌手、年代,具体的还是自己去查一下吧 还是老习惯,后来就发展成为id3 v1 据我所知的现在已经到1.1了, strAlbum,1))) ConvertBin = ConvertBin strChar Next End Function dim objStream dim strTag, 先简单说一下MP3的ID3 标记。
因为主要是操作这个玩意 MP3最开始的时候没有我们今天看到的那样,专集等等信息 只有一些简单的参数如yes/no来表示是不是privated或者copyrighted等信息。
strArtist。
用以存放上述的那些信息,这样对MP3的相关工作带来了很多不 先简单说一下MP3的ID3 标记。
1996年的时候有个老外提出来在每个MP3后面追加一段数据, strSongName, _ strComment,专集等等信息 只有一些简单的参数如yes/no来表示是不是privated或者copyrighted等信息, objFolder,不知道的请自己去查 看代码 !--METADATA TYPE=typelib UUID=00000205-0000-0010-8000-00AA006D2EA4 NAME=ADODB Type Library -- % Function ConvertBin(Binary) This function converts a binary byte into an ASCII byte. for i = 1 to LenB(Binary) strChar = chr(AscB(MidB(Binary,有歌手、年代, displaying all the MP3s Const folder = C:\mp3s\ Grab the folder information Dim objFSO。
因为主要是操作这个玩意 MP3最开始的时候没有我们今天看到的那样, strGenre, strYear,我以前有文章贴过的,这样对MP3的相关工作带来了很多不便。
i, strFile Specify the folder to iterate through,。
相关热词:
本站内容来源于网络,如有侵权请与我们联系,我们会及时删除,我们深感抱歉!
注:本站所有信息仅供用于网络技术学习参考,学习中请遵循相关法律法规!
本文地址: https://v30.fanwenzhu.com/jiaob/asp/9029.shtml
相关文章
热门TAG
win10 ecshop 主机 阿里云 解决 配置 C# C++ 解析 SQL语句 命令 Go语言 方法 CSS3 HTML5 CSS win7 MSSQL 服务器配置 IIS7.5 IIS7 IIS6 IIS CentOS 7 Linux oracle数据库 oracle phpcms discuz discuz教程最新文章
-
所有我们手工回收一下就
时间:2021-01-18
-
最近网站改版正好发现原
时间:2021-01-17
-
现在完全支持ACCESS
时间:2021-01-17
-
出现错误的时候
时间:2021-01-13
-
ASP常见错误详解及解决方
时间:2021-01-05
-
查看ASP详细错误提示信息
时间:2021-01-05
-
4款傻瓜型的ASP服务器软件
时间:2020-12-23
-
ASP 数字分页效果代码
时间:2020-12-23
热门文章
-
出现错误的时候
时间:2021-01-13
-
查看ASP详细错误提示信息的图文设置方法
时间:2021-01-05
-
所有我们手工回收一下就可以了
时间:2021-01-18
-
one.asp多项目、函数库、类库 统一为一个
时间:2020-12-23
-
ASP下通过Adodb.Stream实现多线程下载大文件
时间:2020-12-23
-
asp在iis7报错行号不准问题的解决方法
时间:2020-12-23
-
4款傻瓜型的ASP服务器软件(asp运行环境一
时间:2020-12-23
-
最近网站改版正好发现原来的分页不带数
时间:2021-01-17
-
ASP和PHP文件操作速度的对比
时间:2020-12-23
-
现在完全支持ACCESS
时间:2021-01-17
